đoạn chương trình sau có mấy chỗ sai
Const c:= 3;
Var a, b:= integer;
Begin
Readln(a)
…….b= a/c;
…….Writeln(b);
Readln;
End
giúp em với
Những câu hỏi liên quan
Một số câu lệnh trong chương trình sau viết không đúng, em hãy sửa lại cho đúng:
program So_Sanh;
usescrt;
var A, B= integer;
Begin
clrscr;
writeln(‘Nhap so A: ’); readln(A);
writeln(‘Nhap so B: ‘); readln(A);
if A <> B then writeln(A,’ khac ‘,B) else writeln(B,’ = ‘,A)
readln;
End.
Một số câu lệnh trong chương trình sau viết không đúng, em hãy sửa lại cho đúng:
Program So_Sanh;
uses crt
var A: B= integer;
Begin
clrscr;
writeln(‘Nhap so A: ’);
readln(B);
writeln(‘Nhap so B, khac so A: ‘);
readln(B);
if A > B then; writeln(A,’ lon hon ‘,B) else writeln(B,’ lon hon ‘,A);
readln;
End.
Một số câu lệnh trong chương trình sau viết không đúng, em hãy sửa lại cho đúng:
program So_Sanh
uses crt;
var A B: integer;
begin
clrscr;
writeln(‘Nhap so A: ’) readln(A);
writeln(‘Nhap so B, khac so A: ‘); readln(B);
if A :> B then writeln(A,’ lon hon ‘,B) else writeln(B,’ lon hon ‘,A);
readln;
end.
Có một số câu lệnh trong chương trình sau viết không đúng, em hãy sửa lại cho đúng:
Program Soam Soduong;
uses crt
var A, B: integer;
Begin
clrscr;
writeln(Nhap so A: );
readln(A);
if A > 0 then writeln(A,’ la so duong ‘);
else writeln(A,‘ la so am ’);
readln;
End.
Hãy tìm lỗi của chương trình và sửa lại cho đúng program Chuong_trinh uses crt; var a,b,c:=integer begin writeln('Nhap vao so a va b') readln(a,b) c:=a+b writeln('Ket qua :',c end
program chuong_trinh thiếu chấm phẩy
Sửa lại: program chuong_trinh;
Đúng 0
Bình luận (0)
Xét chương trình sau:
Var a: integer;
Begin
a:=1;
a:= a+10;
Writeln(a);
Readln;
End.
Kết quả của chương trình trên là:
A. 11
B. 100
C.10
D. Tất cả đều sai.
Xét chương trình sau:
Var a: integer;
Begin
a:=5;
a:= a+10;
Writeln(a);
Readln;
End.
Kết quả của chương trình trên là:
A. 15
B. 10
C.5
D. Tất cả đều sai.
Xét chương trình sau:
Var a: integer;
Begin
a:=10;
a:= a+1;
Writeln(a);
Readln;
End.
Kết quả của chương trình trên là:
A. 100
B. 11
C.10
D. Tất cả đều sai.
Xét chương trình sau:
Var a: integer;
Begin
a:=1;
a:= a+10;
Writeln(a);
Readln;
End.
Kết quả của chương trình trên là:
A. 11
B. 100
C.10
D. Tất cả đều sai.